The National Palace Museum Experience/The National Palace Museum Experience.iso/Programs/Guide.dxr/00238.ls

Text File | 1998-11-19 | 503 b | 25 lines

global gboardhotlist, gboardactslist, sbcontentsprite, sbhiliterect

on sideboardinit
  mysbcontrolinit()
  initglobals()
  initcursor()
end

on mysbcontrolinit
  set sbhiliterect to 110
  initsbcontrols()
  puppetSprite(sbhiliterect, 1)
end

on initglobals
  set gboardhotlist to []
  set gboardactslist to []
end

on initcursor
  set mycursor to the number of member "hand"
  set mycursormask to the number of member "hand mask"
  set the cursor of sprite sbhiliterect to [mycursor, mycursormask]
end